home *** CD-ROM | disk | FTP | other *** search
- object BtnRightDlg: TBtnRightDlg
- Left = 371
- Top = 112
- ActiveControl = MaskEdit1
- BorderStyle = bsDialog
- Caption = 'Pre-Set Timer Dialog'
- ClientHeight = 184
- ClientWidth = 351
- Font.Color = clBlack
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- PixelsPerInch = 120
- Position = poScreenCenter
- TextHeight = 16
- object Bevel1: TBevel
- Left = 10
- Top = 10
- Width = 219
- Height = 167
- Shape = bsFrame
- IsControl = True
- end
- object Label1: TLabel
- Left = 34
- Top = 52
- Width = 36
- Height = 16
- Caption = 'Hours'
- FocusControl = MaskEdit1
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 34
- Top = 96
- Width = 49
- Height = 16
- Caption = 'Minutes'
- FocusControl = MaskEdit2
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 34
- Top = 140
- Width = 54
- Height = 16
- Caption = 'Seconds'
- FocusControl = MaskEdit3
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 28
- Top = 12
- Width = 128
- Height = 16
- Caption = 'Pre-Set the timer to:'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object OKBtn: TBitBtn
- Left = 237
- Top = 6
- Width = 95
- Height = 33
- TabOrder = 0
- OnClick = OKBtnClick
- Kind = bkOK
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 237
- Top = 45
- Width = 95
- Height = 33
- TabOrder = 1
- Kind = bkCancel
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object MaskEdit1: TMaskEdit
- Tag = 1
- Left = 116
- Top = 48
- Width = 29
- Height = 24
- Hint = 'PreSet the Hours'
- EditMask = '00;1;_'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- MaxLength = 2
- ParentFont = False
- TabOrder = 2
- Text = '00'
- end
- object MaskEdit2: TMaskEdit
- Tag = 2
- Left = 116
- Top = 92
- Width = 29
- Height = 24
- Hint = 'PreSet the Minutes'
- EditMask = '00'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- MaxLength = 2
- ParentFont = False
- TabOrder = 3
- Text = '00'
- end
- object MaskEdit3: TMaskEdit
- Tag = 3
- Left = 116
- Top = 136
- Width = 29
- Height = 24
- Hint = 'PreSet the Seconds'
- EditMask = '00'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- MaxLength = 2
- ParentFont = False
- TabOrder = 4
- Text = '00'
- end
- end
-